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Ifitroduction 



LIBCOIT is a system routine which can be used for the record management of a 
program library. The LIBEOIT processor is call^ by a control card which con- 
tains parameters that select files and options for UBEOIT input and outfHJt. 

The input to the LIBEDIT prOgra« consists of soale conciliation of the following 

three filM: 

(1) Old Program Library 

This file contains a previously generated library of programs which 
ts to be edited In some way. 

(2) Directives 

This file contains the editing instructions which are to be processed 
by the LIBEDIT program* 

(3) Replacement Library 

This flT« oontAii^ decl^ which are to rvploett of to be fnsisftod between 
records in the old progras library to produce a now ^rogran library* 

The output from a LIBEDIT Job consists of the following two files: 

(1) New Program Library 

This file contains the library of prograaa which VMS produced l»y tho, 
LIBEDIT directives acting on the old program library. The new program 
library is usually stored and then used later as an old program library 
when anothor LIBEDIT Jab or a HDDIFY Job U roquired. 

(2) List Output 

This file cmtalns a record of all actions taken by the LIBEDIT processor. 

All successful editing operations are noted and^ if necessary, error 
diagnostics are listed for any directive which could not be followed. 
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2. Deleting Decks f row ■ Library 

The folln^ng Job f llmtreteB hew to d*1«t» iteefci fPO« • progrea Hbrary: 

1 2345 , SM ITH , CM25000 , 78 , 

PFILES(GET.NPL,X-OLO) 

LIBEDIT(B='0) 

PFILES(PUT.NPL,X=NErf) 

7-^9 (end-of- record) 

*DELETE OPL/DATA 

^7-&-9 (end-of- InforMtion) 

This Job edits a HODXFY program library which is stored In a permnent file named 
(ffL» The "B"0" parameter on the LIBEDIT control card specifies that there is no 
replacement file for this job. By default the old program library is OLD, the 
directive file !■ INPUT, the new program library It tha fi1« NEW end list output 
is on the file OUTPUT. Sea appendix A for a Hat of all possible control card 
options. 

There Is only one LIBEDIT directive on the input file. That DELETE Instruction 
causes the record named DATA in OPL format to be deleted in the new program Hbrary. 
All other records are transferred to the new program library from the old prograffl 
library and a HOOIFY directory deck Is auMMticolly appended* Son nppiendlx B for 
a list of all possible LIBEDIT diroctlves. 
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3. Adding and Replacf in g Decks in a Library 

fhti foUowing Job Illustrates bow to add and replace dedcs in a prosran library: 

123^5, SMITH. CM25000,T8, 

MOI)IfY(F,P>=0,M=LGO) 

PFILES(GET,NPL,X-OLD) 

LIBEOn. 

PFILES (PUT.NPL.X-NEW) 
7-8-9 (end-of- record) 
SUB2 

SUBROUTINE R0015(F»X) 

E= 1.0/5.0 

F»ABS(X)**E 

IF(X.LT,0,0)P— F 

RETURN 

END 

7-8-9 (end-of-'record) 

DATA 

1 SM ITH . JOSEPH n 7- 3^ 1 393 26 . 9 35 X20 
U0NES,JOHN 65'f-22-7603 12.0 19 X20 

1 BAKER , FRANK 026-33-'»5'l5 2f*,5 V X20 

6- 7-9 (end-of- file) 
★REWIND, SOURCE 
★CREATE, SOURCE 

7- 8-9 (end-of- record) 
*TYPE OPL 

★INSERT NAZM,SUB2-MTA 
6-7-&-9 (aiKKof-lnfomatlon) 

This job edits a NOSIFY program library which Is stored in a permanent file named 
NPL. Two decks named SUB2 and DATA are first processed by HOOIFY and put into 
file LGO in program library format, (See document VO-MODIFY for a discussion of 
the MODIFY program.) Then LIBEOIT is called using al] default parameters, i.e. 
the replacement ftle U UK)* the old program library is OLO. the directive file is 
INPUT, the new pf«sram library is NEW and list output is on OUTPUT. 

There ire two tlSEOIT directives on the XNPVT file* lYte *TVPE eard specif left that 

all deck$ processed should be assumed to be in OPL (program library) format unless 
explicitly instructed otherwise by some following directive. The ^INSERT card 
causes all decks on the replacement file between SU62 and DATA to be inserted efter 
the deck named MAIN in the new program library. If any of the inserted decks was 
already in the old program library, then that previous version is automatically 
deleted from the new program library. All other decks are transferred Intact from 
the, old program library to the new program library. 
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Appendix A - LIBEDIT Control Card Options 

Format: LIBEDIT (p j^pj* - • • .Rgj) 

where p. ■ Parameters which nay be in the following general 

formats; 

a 

a - f naM 



Q m 0 

Paraweter Action Tafcan 

I « 0 Use no directive card input 

I m fneiM Use file fnaaie for directive card Input 

P ^ 0 Use no old library file 

P > fnMe Use file fnasie for old library fife 

N « fnasK Use file Hmm for new library file 

t^O Suppress correction listing 

to - fnaM Use file fnasia for correction listing 

8^0 Do not use default replacement file 

B » fname Use file fname for replacement file 

C Copy new library file to old library file 
af tar processli^ 

R Bo not rawind old or new llbrery file after 
proceaslng 

V Call VFVLIB after the LIKDtT operation 



The LIBEDIT control card calls the LIBEDIT program and specifies additional In- 
formation in the parameter list. Parameters can be in any order and are not manda- 
tory. For any or all parameters omitted from the control card» LIBEDIT assumes a 
default value; 

I = INPUT LO - OUTPUT C deselected 

p o OLD B » LGO R deselected 

N - NEW V deselected 

The LIBEDIT processor requires a liiniiHm of about 25000 words and there Is no euto- 
matic field length adjustment* 
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Appendix fi - Ip^^^IT Direcjtlves 



LIBEDIT processes directives Independent of their order of appearance except for 
the cards grouped by *TYPE, *FILE, and *NRANDOH and Mhefe several inserts take 
place in the same record. If LIBEDIT cannot process tlw Specified combination of 
directives, it lists the conflicting directive cards, issues an error diagnostic 
message, and aborts Uw'Jctb. 

Directives begin with an asterisk in column 1. All cards in the directive file 
that do not begin with an asterisk are treated as continuation cards to the most 
recent card that has an asterisk in column 1. If there are no directives, LIBEDTT 
replaces the records of the file OLD which have the same name and type as the 
records on the file LGO and writes a new library file on the file NEW, LIBEDIT 
directives arc; 



*FILE 
*NRANDOM 
*REWINO 
*TYPE 



*INSERT 

*BEFORE 
*DELETE 
*IGNOR£ 



*ADD 
*BUILD 
★COMMENT 
*OATE 



♦NOREP 
★RENAME 
★REPLACE 
*COPY 



*P"-E card 

Format: *FILE fname 



where fname 



Nane of additional replacement file; subject to operating system 

restrictions on file names* 



The 'I'^FILE card declares a secondary file to be an additional file that contains 
replacejnent records* LIBEDIT directives following a ^FILE card refer to records 
on the declarMi tepUem^ht file* If fnm» is LXH^IT uses ttfe HH nnnes ott ^ 
the control card. 

*HftANDOM Card 

Format: *NRANI)OM fname 



where fname ■ Nme of non- random reptennent file; subject to operating system 
restrictions on file names. 

The iftWlANOOM card deeleret a secondary file to b« e nbn-rendem repleeement fife. 

This means that all manipulation of the file must be done by read, skip, and back- 
space operations (and not by random read operations). LIBEDIT directives following 
a ^NRANDOH card refer to records on the nof^random replacement file. 

^REWIND Card 

Format: *REWXND fname 



where fname - Name of file to rewind 

F0f the *REWIN0 card, LIBEDIT rewinds the specified file before and after the 
editing process* 



LIBEDIT - 7 



Format: *TYPE Type 
where type » 



Specifies internal record structure* 


Type 


Structure 


PP 


Pel>f|>lMira1 |»«cessor program 


COS 


Chippewi fofiMt CPU program 


KBL 


Relocatebte CPu program 


OVL 


SCOPE format CPU overlay 


ULIB 


User library program 


OPL 


Old program library deck 


OPLC 


Old program library common deck 


ABS 


Multiple entry point overlay 


TEXT 


Unrecognizable as a program 



I.e. MODirV deck format 



With the ^TYPE card, the user can specify the default type of record to which sub- 
sequent LIBEDIT directives refer. A *TYPE card is in effect until the next *TYPE 
card appears. If there Is no *TYPE card, tfw default type is TEXT. 

Example: *TYPE COS 

*INSERT GEORGE, MARY 

ftDELETd HENRY - IDA 

is equivalent to; 

*INSERT COS/GEORGE, COS/MARY 

*OELETE COS/HENRY - COS/IOA 

*I»1SERT Card 

Format: *INSERT typei/nameptype^/name^ or 

♦INSERT typa|/naiM|.typtt2/naine2 - typa^nam^ or 
*INSEin' name^.name^ or 
♦INSERT naine| .name^ - name^ 

*^re type, «• Same as type described with the *TYPE card, if omitted, LIBEDIT 
assumes the last type given on a *TYPE card. 

nme. « Name of record on old library file after which to Insert the 
Specified record or records. 
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4 



name^ VtB90 of record from replacement flf« to insert after record 
- ttemmy If nane^ " 0, LIBEOXT inserts a zero length record. 

If 9«iMt2 ** UB£OIT inserts all records of the specified or 

inq^lted type. 

namej-name^ ■ Ellipsis of group of records from replacement file to 

^ insert after record name|. If nane^ ^ LIBEOXT inserts 

all records to en End-of-FIle niark. 

The ^INSERT card directs LIBEDIT to insert a record or group of records from the 
current replacement file af tar • specified old library record for transcription to 
the new library file. The current replacement fiie is the last replacement file 
specified by ^FILE or LIBEOIT control card. As described above^ asterisk and zero 
have special meaning when they appeer in lieu of record names* Insertion of a 
record or records causes automatic deletion Of the record<s) having the same name(s) 
and type(s) from the old library file* 

D(Bpq>1e; 

♦TYPE TEXT 

♦INSERT OPL/LEA, OSCAR - * 

These cards direct LIBEDIT to insert after the OPL deck LEA on the old library file 
all TEXT type records from OSCAR to an End-of-File mark. If any of these TEXT 
lr«corte has the same naiw as e TEXT record thet Is a]|*eady on th* old library file^ 
the old TEXT record is deleted for transcription to the nev library file. 

^BEFORE Card 

Format: *BEFORE type|/name|,type2/naine2 or 

*BEroRE type^/namej »type2/name2 T type^/nane^ or 
^BEFORE namei^namej or 
*BEFORE naWi^naMj " nane^ 

Same as type described with the *TYP£ card; if omitted LIBEDIT 
assmes the last type given on a ^YPE card. 

Name of record on old library file before which to insert the 
specified record or records. If neroe. ■* LIBEOXT inserts the 
records before the End-of-File mark. 

Name of record from replacement file to insert before record 
name I . If naine^ 0, LXBCDXT inserts a zero length record. 

Xf nenej >- LXBEDIT inserts ell records of the specified of 

if^lied type. 



where type^ " 
iiwie| » 

naaie^ -* 
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name^ name^ = Ellipsis of group of records from replacement file to 

insert before record namep If nane^ - LIBEDXT inserts 

alt records to an End-of-Flle mark. 

The ^BEFORE card directs LIBEDIT to insert a record or group of records from the 
current replacement file before a specified old library record for transcription 
to the AW tittraty fll«» The t^rrafirt fpl^emmnt file U the last rfl|>1aeeiMrtt file 
specified by ^FILE or LIBEDIT control card. As described above, asterisk and zero 
have special meaning when they appear in lieu of record names* As for ^INSERT, 
Insertion of e record or ir«Gerd« causes automtic deletioit of the old record(s) he^ 
Ing the same name(s)* 

tff DELETE Card 

Pormat: *OELETE type|/naiM| or 

*DELETE type^/nane^ - type2/naiM2 or 
*OELETE name I or 
•DELETE iWHi - namej 

where type. « Same as type described with the i^TYPE card; if omitted, LIBEDIT 
assumes the last type given on a •TYPE card. 

nam| * Name of record on old library file to delete. If iiame| « •» 
LIBEDIT deletes all records of the specified type. 

name. - nemej « Etlt^Is of group of Mconls on eld Ifbrkry file to delete. 

If name, - LIBEDIT deletes records to an En^of-FHa nark. 



The ^DELETE card directs LIBEDIT to suppress transcription of a record or group of 
records frM the old library file to the new library file. 

Example: 

^DELETE PP/IAD-REL/RUN 

This card directs LIBEDIT to delete the existing peripheral procMflOr program LAO, 
the jpelocetloh CPU program RUM* end ell logieel records betwem them. 

*ICN0RE Card 

Pbrmat: ^IGNORE type^/namei or 

^IGNORE typej/name^ " type^/name^ or 
*IGNORE nane, or 
IGNORE nawe. - nane^ 
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where type. " Same as type described with the *TVPE card; if omitted* LI8E&IT 
assumes the last type given on a ^TYfE card. 



nane 



I « Name of record from replacement file to ignore during processing. 
If namei » ^, LIBEDIT ignores all records of the specified type. 

name. - nane. " Ellipsis of group of records ffdp raplacenmt file to 

' ignore during processing. If naiiB* * LIBEDIT ignores 

records to an End-of*File mark* 

The ^IGNORE card directs LIBEDIT to ignore • record or group of records on the 
current replacement file during processing, 

Enmple: 

^FILE WOMAN 
^IGNORE FRAN - * 

LIBEOIT ignores the program FRAN of the current type and all following programs 
to an End-of-File nark on the replacement file WOMAN. 

»ADD Card 

Format: *ADD Mb, typej/name| or 

*AOD 1ib» type|/name| - typej/name^ or 
«ADir Hfo» naiMf or 
^DD Ub» na»e| - nane2 

where lib ^ Specifies the library or directory: 



lib 


Library or Directory 


DOS 


Dead start Library 


RCL 


Resident Chippewa Library 


RSL 


Resident Subroutine Library 


RPL 


Resident Peripheral Library 


PLD 


Peripheral Library Directory 


CLO 


Chippewa Library Directory 


SLO 


SCOPE Library Directory 


ULD 


User Library Directory 



type. « Same as type ^ewripted with the *tyH eerdi if eiiatt«d» 
LXBEOXT asstmes the last type given oii a «Tm card. 

- Name of prograM t6 add «o the specified Ubtatf tif directory. 
Zf nanej - *, LIBEDIT adds all phsgrams of the specified type. 
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namei " runse^ * Ellipsis of group of progran-ts to add at the end of the 
specified library or directory. If name^ = *, LIBEDIT 

adds all programs from namej to an End-of-Ftle mark. 

The MOD card appends the specified program or programs to the specified library 
or directory for treMcrlption to the new library file< ^ 

•WaiD Card 

Fonnet: ««UXU> dnane 

«rfiere dname « Name of dIrecMirY record 

The ^BUILO card requests LIBEDIT to construct and append a directory deck in 
MODIFY fonmt to the nm tlbrery filet Horaover, if the-old library file has 
such a directory, LIBEOXT eutoutlcelly genetetes a new directory deck without 
explicit ^BUILD request* 

^COMMHIT Cerd 

Foraat: ^COMMENT type/name comment 

where type <■ $aiae as type described with the ^'■TYPE card; if ommittedt 
LIBEDIT assumes the last type given on a ^TYPE card, 

name • Name of program on replacement or old library file« 

comment ■ Any string of kO^^ characters or less that is suitable as a 

comment* 

The *COMMENT card adds a comment to the Prefix (77) table for a program on a 

replacement or the old library file« 

*PATE Card 

Format: *DATE type/nene coninent 

where type = Same as type described with the ^TYPE card; if omitted, 
LIBEDIT assumes the last type given on a ^^TYPE card, 

name - Naoie of program on repla ca me n t or old library file. 

comment m Any string of ifO^^ characters or less tliat is suitable 
as a comment. 

The VcDATE card adds the current data and submitted comnent to the Prefix (77) 
table for a prograii 6i|:a reptacement or the old library file. 
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Fonnat: *NOREP fnaw 

where fnane - Nuw of replacanent file to beoone a no-replace file 

The ^i^ilOREP card declares the specified replacement file to be a nc^replace file. 

LIBEDIT then does not replace all records of the old library file with records on 
the no-replace file having identical names, but replaces records froin a no-replace 
file selectively according to «REPLACE. *INSERT. and ^BEFORE cards. 

★RENAME card 

Fbrmat: ^RENAME type/nanepnaiMj 

whera type » Sam as type described with the ^TYPE card; if omitted, LXBEDXT 
asstMes the last type given on a ^TYPE card. 

nanei <■ Name of program on roplacenant or old library file td have a 
new name. 

naiMj ■ New nam of progran. 

The ^RENAME card assigns a new nam to a record on the old library or current re- 
placemnt file for traniscrlption to the new library file. 

li^REPLACE Card 

Formt; *ltEPLACE type|/nam| or 

^REPLACE typcj/namej • type^/name^ or 
PREPUCE nam| or 
^REPLACE nam| - nam^ 

h^ro type. » Same as type desclrbed with the *TYPE card; if omitted, LIBEDIT 
assumes the last type given on a *TYPE card. 

namj « Nam of recorcl froni replacemnt file to replace on old library file. 

name| - name^ » Ellipsis of group of records from replacemnt file repta^ 
' ^ on old library file. 

The ^REPLACE card directs LIBEDIT to selectively replace records from a curfmt 
replacement file that has been declared a no- rap lace file (see the *NORCP card 
description). 
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EXanple: 

Suppose file FRUIT has records APPLE, CHERRY, GRAPE, and ORANGE. Records APPLE 

■nd GHEMT of tb* oM library fila are to b* retaliwd. TIM MqMww*: 

*FILE FRUIT 

*XGNORE APPU - CHERRY 

•nd tha sequence: 

♦FILE FRUIT 

*NOREP FRUIT 

*REPUC£ GRAPE - ORANBE 

Will produce the MM effect, LIBEDTT provides both methods for the situations 
udMfa discreet cholea can save the effort of punching countless correction cards, 

*COPY 

Format: *COPY* 

The ★COPY card directs LI8EDIT to copy the naM library fila to the old library fila 

after it has processed all correction cards. 
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